perm filename ZZZ[C,JRA] blob sn#016822 filedate 1972-12-18 generic text, type T, neo UTF8
00100	(ADD(IF-NEEDED THM1(!<X SUCKS)
00200	"AUX"((P(FETCH '(!>X HUMAN))))
00300	:L(TRY-NEXT P '(ADIEU))
00400	(AU-REVOIR(INSTANCE))
00500	(GO 'L)))
00600	(ADD '(TURING SUCKS))
00700	(ADD '(ME HUMAN))
00800	(CSETQ  YY(FETCH '(!>XX SUCKS)))